home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
How Would You Survive?
/
How Would You Survive (1995)(Grolier)[Mac-PC].iso
/
pc
/
egyptw.dir
/
01702_Script_E Family Screens
< prev
next >
Wrap
Text File
|
1995-09-13
|
9KB
|
313 lines
global gQuest, gBeenClicked
on EFamilyRollovers1
set gBeenClicked = 0
if (not(CheckClickedStatus(gQuest))) then
if rollover(6) then
repeat while rollover(6)
EgyptCursor
set the locH of sprite 13 to 337
set the locV of sprite 13 to 203
updatestage
if the mousedown then
set GBeenClicked = 1
else
if gBeenClicked = 1 then
repeat while gBeenClicked = 1
AnimateLoop 6, 218, 5, 0, 2
end repeat
end if
end if
end repeat
else
if rollover(8) then
ArrowCursor
repeat while rollover(8)
set the locH of sprite 9 to 530
set the locV of sprite 9 to 306
updatestage
end repeat
set the locH of sprite 9 to 930
updatestage
else
if rollover(10) then
ArrowCursor
repeat while rollover(10)
set the locH of sprite 11 to 424
set the locV of sprite 11 to 166
updatestage
end repeat
else
if rollover(7) then
repeat while rollover(7)
EgyptCursor
set the locH of sprite 12 to 489
set the locV of sprite 12 to 279
updatestage
if the mousedown then
set GBeenClicked = 1
else
if gBeenClicked = 1 then
repeat while gBeenClicked = 1
AnimateLoopFast 7, 224, 5, 0, 2
end repeat
end if
end if
end repeat
set the locH of sprite 12 to 989
updatestage
else
if rollover(14) then
ArrowCursor
repeat while rollover(14)
set the locH of sprite 15 to 485
set the locV of sprite 15 to 298
updatestage
end repeat
set the locH of sprite 15 to 985
updatestage
else
if rollover(16) then
ArrowCursor
repeat while rollover(16)
set the locH of sprite 17 to 373
set the locV of sprite 17 to 319
updatestage
end repeat
set the locH of sprite 17 to 973
updatestage
else
if rollover(18) then
ArrowCursor
repeat while rollover(18)
set the locH of sprite 19 to 419
set the locV of sprite 19 to 307
updatestage
end repeat
set the locH of sprite 19 to 919
updatestage
else
if rollover(20) then
ArrowCursor
repeat while rollover(20)
set the locH of sprite 21 to 233
set the locV of sprite 21 to 335
updatestage
end repeat
set the locH of sprite 21 to 933
updatestage
else
if rollover(27) then
ArrowCursor
repeat while rollover(27)
set the locH of sprite 28 to 423
set the locV of sprite 28 to 273
updatestage
end repeat
set the locH of sprite 28 to 923
updatestage
else
if rollover(40) then
HandCursor
else
if rollover(41) then
HandCursor
else
if rollover(42) then
HandCursor
else
ArrowCursor
end if
end if
end if
end if
end if
end if
end if
end if
end if
end if
end if
end if
end if
RandomQuestion(gQuest)
end
on EFamilyRollovers2
set gBeenClicked = 0
if (not(CheckClickedStatus(gQuest))) then
if rollover(7) then
repeat while rollover(7)
EgyptCursor
set the locH of sprite 10 to 323
set the locV of sprite 10 to 336
updatestage
if the mousedown then
set GBeenClicked = 1
else
if gBeenClicked = 1 then
repeat while gBeenClicked = 1
AnimateLoop 7, 250, 6, 0, 2
end repeat
end if
end if
end repeat
set the locH of sprite 10 to 923
updatestage
else
if rollover(6) then
repeat while rollover(6)
EgyptCursor
set the locH of sprite 11 to 202
set the locV of sprite 11 to 215
updatestage
if the mousedown then
set GBeenClicked = 1
else
if gBeenClicked = 1 then
repeat while gBeenClicked = 1
AnimateLoopFast 6, 256, 5, 0, 2
end repeat
end if
end if
end repeat
set the locH of sprite 11 to 902
updatestage
else
if rollover(8) then
ArrowCursor
repeat while rollover(8)
set the locH of sprite 9 to 313
set the locV of sprite 9 to 359
updatestage
end repeat
set the locH of sprite 9 to 913
updatestage
else
if rollover(8) then
ArrowCursor
repeat while rollover(8)
set the locH of sprite 9 to 313
set the locV of sprite 9 to 359
updatestage
end repeat
set the locH of sprite 9 to 913
updatestage
else
if rollover(39) then
HandCursor
else
if rollover(40) then
HandCursor
else
if rollover(41) then
HandCursor
else
if rollover(42) then
HandCursor
else
ArrowCursor
end if
end if
end if
end if
end if
end if
end if
end if
end if
RandomQuestion(gQuest)
end
on EFamilyRollovers3
set gBeenClicked = 0
if (not(CheckClickedStatus(gQuest))) then
if rollover(7) then
repeat while rollover(7)
EgyptCursor
if the mousedown then
set GBeenClicked = 1
else
if gBeenClicked = 1 then
preloadcast 312, 323
repeat while gBeenClicked = 1
Animate12 7, "WhooshForCat.AIFF"
end repeat
end if
end if
end repeat
else
if rollover(9) then
repeat while rollover(9)
set the locH of sprite 15 to 140
set the locV of sprite 15 to 285
updatestage
end repeat
set the locH of sprite 15 to 940
updatestage
else
if rollover(10) then
repeat while rollover(10)
EgyptCursor
if the mousedown then
set GBeenClicked = 1
else
if gBeenClicked = 1 then
repeat while gBeenClicked = 1
AnimateCircle3 10,"SE141802.AIF (Jar Rolling)"
end repeat
end if
end if
end repeat
else
if rollover(11) then
EgyptCursor
repeat while rollover(11)
EgyptCursor
if the mousedown then
set GBeenClicked = 1
else
if gBeenClicked = 1 then
repeat while gBeenClicked = 1
Animate6 11, "BabyLaugh1.AIFF"
end repeat
end if
end if
end repeat
else
if rollover(12) then
ArrowCursor
repeat while rollover(12)
set the locH of sprite 14 to 411
set the locV of sprite 14 to 250
updatestage
end repeat
set the locH of sprite 14 to 911
updatestage
else
if rollover(39) then
HandCursor
else
if rollover(41) then
HandCursor
else
if rollover(42) then
HandCursor
else
ArrowCursor
end if
end if
end if
end if
end if
end if
end if
end if
end if
RandomQuestion(gQuest)
end